inherited sprZkxs: TsprZkxs
  HelpContext = 1156
  Caption = #1059#1095#1072#1089#1090#1082#1080' '#1091#1095#1077#1090#1072
  PixelsPerInch = 96
  TextHeight = 13
  inherited Panel2: TPanel
    Top = 25
    Height = 529
    inherited PageControl1: TPageControl
      Height = 529
      inherited tsTab: TTabSheet
        inherited GroupBox3: TGroupBox
          Height = 501
          inherited dbgRefer: TDBGridEh
            Height = 484
            Columns = <
              item
                EditButtons = <>
                FieldName = 'ID'
                Footers = <>
                Width = 38
              end
              item
                EditButtons = <>
                FieldName = 'NAME'
                Footers = <>
                Width = 134
              end
              item
                EditButtons = <>
                FieldName = 'ADDRESS'
                Footers = <>
                Width = 130
              end
              item
                EditButtons = <>
                FieldName = 'PHONE'
                Footers = <>
                Width = 66
              end
              item
                EditButtons = <>
                FieldName = 'MUNIC'
                Footers = <>
                Width = 70
              end
              item
                EditButtons = <>
                FieldName = 'CODE'
                Footers = <>
                Width = 68
              end
              item
                EditButtons = <>
                FieldName = 'ORGCODE'
                Footers = <>
                Visible = False
              end
              item
                EditButtons = <>
                FieldName = 'RCOMFORT'
                Footers = <>
                Width = 79
              end
              item
                EditButtons = <>
                FieldName = 'DESCRIPTION'
                Footers = <>
                Width = 181
              end>
          end
        end
      end
      inherited tsForm: TTabSheet
        inherited GroupBox2: TGroupBox
          Top = 0
          Width = 784
          Height = 501
          Align = alClient
          object Label1: TLabel [0]
            Left = 108
            Top = 15
            Width = 17
            Height = 13
            Alignment = taRightJustify
            Caption = #1048#1044
          end
          object Label2: TLabel [1]
            Left = 75
            Top = 35
            Width = 50
            Height = 13
            Alignment = taRightJustify
            Caption = #1053#1072#1079#1074#1072#1085#1080#1077
          end
          object Label3: TLabel [2]
            Left = 59
            Top = 55
            Width = 66
            Height = 13
            Alignment = taRightJustify
            Caption = #1040#1076#1088#1077#1089' '#1086#1092#1080#1089#1072
          end
          object Label4: TLabel [3]
            Left = 82
            Top = 75
            Width = 45
            Height = 13
            Alignment = taRightJustify
            Caption = #1058#1077#1083#1077#1092#1086#1085
          end
          object Label5: TLabel [4]
            Left = 64
            Top = 115
            Width = 61
            Height = 13
            Alignment = taRightJustify
            Caption = #1050#1086#1076' '#1091#1095#1072#1089#1090#1082#1072
          end
          object Label6: TLabel [5]
            Left = 21
            Top = 155
            Width = 104
            Height = 13
            Hint = #1082#1086#1076' '#1076#1083#1103' '#1074#1085#1077#1096#1085#1080#1093' '#1082#1083#1102#1095#1077#1081
            Alignment = taRightJustify
            Caption = #1050#1086#1101#1092'.'#1082#1086#1084#1092#1086#1088#1090#1085#1086#1089#1090#1080
          end
          object Label8: TLabel [6]
            Left = 9
            Top = 135
            Width = 116
            Height = 13
            Alignment = taRightJustify
            Caption = #1057#1074#1103#1079#1100' '#1089' '#1087#1088#1077#1076#1087#1088#1080#1103#1090#1080#1077#1084
          end
          object Label7: TLabel [7]
            Left = 62
            Top = 175
            Width = 63
            Height = 13
            Hint = #1082#1086#1076' '#1076#1083#1103' '#1074#1085#1077#1096#1085#1080#1093' '#1082#1083#1102#1095#1077#1081
            Alignment = taRightJustify
            Caption = #1055#1088#1080#1084#1077#1095#1072#1085#1080#1103
          end
          inherited pnlButtons: TPanel
            Top = 468
            Width = 780
            TabOrder = 9
            inherited SpeedButton1: TSpeedButton
              Left = 581
            end
            inherited SpeedButton2: TSpeedButton
              Left = 683
            end
          end
          object DBEditEh1: TDBEditEh
            Left = 128
            Top = 12
            Width = 57
            Height = 19
            AlwaysShowBorder = True
            Color = clInactiveCaptionText
            DataField = 'ID'
            DataSource = dscRefer
            EditButtons = <>
            Enabled = False
            Flat = True
            ReadOnly = True
            TabOrder = 0
            Visible = True
          end
          object DBEditEh4: TDBEditEh
            Left = 128
            Top = 72
            Width = 217
            Height = 19
            AlwaysShowBorder = True
            DataField = 'PHONE'
            DataSource = dscRefer
            EditButtons = <>
            Flat = True
            TabOrder = 3
            Visible = True
          end
          object DBEditEh5: TDBEditEh
            Left = 128
            Top = 112
            Width = 217
            Height = 19
            AlwaysShowBorder = True
            DataField = 'CODE'
            DataSource = dscRefer
            EditButtons = <>
            Flat = True
            TabOrder = 5
            Visible = True
          end
          object DBEditEh6: TDBEditEh
            Left = 128
            Top = 152
            Width = 217
            Height = 19
            AlwaysShowBorder = True
            DataField = 'RCOMFORT'
            DataSource = dscRefer
            EditButtons = <>
            Flat = True
            TabOrder = 7
            Visible = True
          end
          object DBEditEh2: TDBEditEh
            Left = 128
            Top = 32
            Width = 217
            Height = 19
            AlwaysShowBorder = True
            DataField = 'NAME'
            DataSource = dscRefer
            EditButtons = <>
            Flat = True
            TabOrder = 1
            Visible = True
          end
          object DBEditEh3: TDBEditEh
            Left = 128
            Top = 52
            Width = 217
            Height = 19
            AlwaysShowBorder = True
            DataField = 'ADDRESS'
            DataSource = dscRefer
            EditButtons = <>
            Flat = True
            TabOrder = 2
            Visible = True
          end
          object DBLookupComboboxEh1: TDBLookupComboboxEh
            Left = 128
            Top = 132
            Width = 217
            Height = 19
            AlwaysShowBorder = True
            DataField = 'ORGCODE'
            DataSource = dscRefer
            EditButtons = <>
            Flat = True
            KeyField = 'ID'
            ListField = 'NAME'
            ListSource = dscOrgs
            TabOrder = 6
            Visible = True
          end
          object dbcbSupplier: TDBCheckBoxEh
            Left = 44
            Top = 93
            Width = 97
            Height = 17
            Alignment = taLeftJustify
            AlwaysShowBorder = True
            Caption = #1052#1091#1085#1080#1094#1080#1087#1072#1083#1100#1085#1099#1081
            DataField = 'MUNIC'
            DataSource = dscRefer
            Flat = True
            TabOrder = 4
            ValueChecked = '1'
            ValueUnchecked = '0'
            Visible = False
          end
          object DBEditEh7: TDBEditEh
            Left = 128
            Top = 172
            Width = 217
            Height = 19
            AlwaysShowBorder = True
            DataField = 'DESCRIPTION'
            DataSource = dscRefer
            EditButtons = <>
            Flat = True
            TabOrder = 8
            Visible = True
          end
        end
      end
    end
  end
  inherited GroupBox1: TGroupBox
    Height = 0
  end
  inherited dsRefer: TpFIBDataSet
    UpdateSQL.Strings = (
      'UPDATE ZKXS'
      'SET '
      '    NAME = :NAME,'
      '    ADDRESS = :ADDRESS,'
      '    PHONE = :PHONE,'
      '    DESCRIPTION = :DESCRIPTION,'
      '    MUNIC = :MUNIC,'
      '    CODE = :CODE,'
      '    ORGCODE = :ORGCODE,'
      '    RCOMFORT = :RCOMFORT'
      'WHERE'
      '    ID = :OLD_ID'
      '    ')
    DeleteSQL.Strings = (
      'DELETE FROM'
      '    ZKXS'
      'WHERE'
      '        ID = :OLD_ID'
      '    ')
    InsertSQL.Strings = (
      'INSERT INTO ZKXS('
      '    NAME,'
      '    ADDRESS,'
      '    PHONE,'
      '    DESCRIPTION,'
      '    MUNIC,'
      '    CODE,'
      '    ORGCODE,'
      '    RCOMFORT'
      ')'
      'VALUES('
      '    :NAME,'
      '    :ADDRESS,'
      '    :PHONE,'
      '    :DESCRIPTION,'
      '    :MUNIC,'
      '    :CODE,'
      '    :ORGCODE,'
      '    :RCOMFORT'
      ')')
    RefreshSQL.Strings = (
      'select * from zkxs'
      ''
      ' WHERE '
      '        ZKXS.ID = :OLD_ID'
      '    ')
    SelectSQL.Strings = (
      'select * from zkxs')
    BeforeEdit = dsReferBeforeEdit
    BeforeInsert = dsReferBeforeInsert
    object dsReferID: TFIBIntegerField
      DisplayLabel = #1048#1044
      FieldName = 'ID'
    end
    object dsReferNAME: TFIBStringField
      DisplayLabel = #1053#1072#1079#1074#1072#1085#1080#1077
      FieldName = 'NAME'
      Size = 255
      EmptyStrToNull = True
    end
    object dsReferADDRESS: TFIBStringField
      DisplayLabel = #1040#1076#1088#1077#1089' '#1086#1092#1080#1089#1072
      FieldName = 'ADDRESS'
      Size = 255
      EmptyStrToNull = True
    end
    object dsReferPHONE: TFIBStringField
      DisplayLabel = #1058#1077#1083#1077#1092#1086#1085
      FieldName = 'PHONE'
      EmptyStrToNull = True
    end
    object dsReferMUNIC: TFIBSmallIntField
      DisplayLabel = #1052#1091#1085#1080#1094#1080#1087#1072#1083#1100#1085#1099#1081
      FieldName = 'MUNIC'
    end
    object dsReferCODE: TFIBStringField
      DisplayLabel = #1050#1086#1076' '#1091#1095#1072#1089#1090#1082#1072
      FieldName = 'CODE'
      Size = 16
      EmptyStrToNull = True
    end
    object dsReferORGCODE: TFIBIntegerField
      FieldName = 'ORGCODE'
      Visible = False
    end
    object dsReferRCOMFORT: TFIBBCDField
      DisplayLabel = #1050#1086#1101#1092'.'#1082#1086#1084#1092#1086#1088#1090
      FieldName = 'RCOMFORT'
      Size = 2
      RoundByScale = True
    end
    object dsReferDESCRIPTION: TFIBStringField
      DisplayLabel = #1055#1088#1080#1084#1077#1095#1072#1085#1080#1103
      FieldName = 'DESCRIPTION'
      Size = 255
      EmptyStrToNull = True
    end
  end
  inherited PropStorage: TPropStorageEh
    Section = 'sprZkxs'
  end
  object dsOrgs: TpFIBDataSet
    SelectSQL.Strings = (
      'select id,name from userorg')
    Transaction = trLists
    Database = MAINDM.pMainDatabase
    Left = 478
    Top = 251
    object dsOrgsID: TFIBIntegerField
      FieldName = 'ID'
    end
    object dsOrgsNAME: TFIBStringField
      FieldName = 'NAME'
      Size = 60
      EmptyStrToNull = True
    end
  end
  object dscOrgs: TDataSource
    DataSet = dsOrgs
    Left = 480
    Top = 305
  end
end
